home *** CD-ROM | disk | FTP | other *** search
/ Experimental BBS Explossion 3 / Experimental BBS Explossion III.iso / graphics / qpeg11c.zip / ET3000.ASM < prev    next >
Assembly Source File  |  1993-10-14  |  429b  |  29 lines
  1. ;
  2. ; QPEG video driver
  3. ; for Tseng Labs ET3000 chipsets
  4. ;
  5.  
  6.         .286
  7. Code    Segment Para 'Code'
  8.         Assume  cs:Code
  9.         Org 100h
  10.  
  11. Procs   dw      Bank,Init,Exit,0
  12.  
  13. Bank:   mov     dl,al
  14.         shl     al,3
  15.         or      al,dl
  16.         or      al,40h
  17.         mov     dx,03cdh
  18.         out     dx,al
  19.         retf
  20.  
  21. Init:   retf
  22.  
  23. Exit:   retf
  24.  
  25. Code    Ends
  26.         End Procs
  27.  
  28. ; End of source.
  29.